home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 3: The Continuation / 17-Bit_The_Continuation_Disc.iso / arug / arug 28 / amigasat (.txt) < prev    next >
AmigaBASIC Source Code  |  1994-01-27  |  1KB  |  46 lines
  1.  
  2. SCREEN 2,640,240,2,2
  3. WINDOW 2,"World Map",(0,11)-(631,225),20,2
  4. WINDOW 1,"Amigasat v1.0",(0,11)-(631,225),20,2
  5.  
  6. PALETTE  0,0,0,0       :REM black
  7. PALETTE  1,1,0.87,0.73   :REM tan
  8. PALETTE  2,0.47,0.87,1   :REM blue sky
  9. PALETTE  3,0.93,0.2,0    :REM Red  
  10.  
  11. WINDOW 1
  12.  
  13. CHDIR "satellites:satellites"
  14.  
  15. CLS
  16. CLEAR ,40000,3048
  17. CHDIR "df0:satellites"
  18. LOCATE 8,28:COLOR 1,0:PRINT "Original programs written " 
  19. LOCATE 10,39:PRINT "by"
  20. LOCATE 12,34:PRINT "W0SL & W3IWI"
  21. LOCATE 16,28:COLOR 2,0:PRINT "converted to Amiga Basic"
  22. LOCATE 18,39:PRINT "by"
  23. LOCATE 20,37:PRINT "VK2DSU"
  24. LINE (140,50)-(500,170),3,B
  25. CHAIN "satmenu.bas"
  26. '
  27. '
  28. '------------------------------------------------------------------------
  29. '
  30. '
  31. '    I would like to hear of any improvments or additions to Amigasat
  32. '    If you make any drop me a message .
  33. '
  34. '    David Gazzard (VK2DSU)
  35. '    20 MORRIS ST.
  36. '    Warners Bay N.S.W.
  37. '    Australia    2114 
  38. '
  39. '    Or any Sydney Packet radio bulliten board system
  40. '    (VK2AHX,VK2XY,VK2CZZ,VK2OP)
  41. '
  42. '
  43. '
  44. '------------------------------------------------------------------------
  45.  
  46.